home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / scope / 151-175 / scopedisk168 / asmmacros / am_02 / disable.i < prev    next >
Text File  |  1995-03-19  |  539b  |  26 lines
  1.      NOLIST
  2. Disable   MACRO                ; 9 Feb 89
  3. *------------------------------; Start of Disable macro.
  4.      NOLIST
  5.      IFND _intena
  6.      LIST
  7.      XREF _intena
  8.      NOLIST
  9.      ENDC
  10.      IFEQ ReEntrant-1
  11.      LIST
  12.         MOVE.L exec.library.ptr(A5),A6
  13.      NOLIST
  14.      ENDC
  15.      IFNE ReEntrant-1
  16.      LIST
  17.         MOVE.L exec.library.ptr,A6
  18.      NOLIST
  19.      ENDC
  20.      LIST
  21.      MOVE.W #$4000,_intena
  22.      ADDQ.B #1,$126(A6)        ; Increment IDNestCnt.
  23. *------------------------------; End of Disable macro.
  24.      ENDM
  25.      LIST
  26.